Remove extra arguments from a model specification
Examples
m <- model_spec(x1, x2) |> set_args(nominal = model_spec(x1), link = "probit")
drop_args(m, link)
#> model_spec: ~ x1 + x2
#> args: nominal = ~ x1
Remove extra arguments from a model specification
m <- model_spec(x1, x2) |> set_args(nominal = model_spec(x1), link = "probit")
drop_args(m, link)
#> model_spec: ~ x1 + x2
#> args: nominal = ~ x1